home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
LOGIC Apps
/
Logic-APPLE_II_APPS.iso
/
mac
/
LOGIC Apple II 5.25" Library - DOS Part 1
/
DOS002.dsk
/
THROTTLE.FP.bas
< prev
next >
Wrap
BASIC Source File
|
2012-02-16
|
365b
|
6 lines
19 PR# 0: IN# 0
20 FOR I = 784 TO 854
21 READ D: POKE I,D: NEXT I
22 DATA 72,44,0,192,173,0,192,44,16,192,201,160,240,29,201,141,240,22,138,72,152,72,162,0,32,30,251,200,152,32,168,252,104,168,104,170,104,76,240,253,76,3,224,44,0,192,16,251,141,16,192,48,221,169,240,133,54,169,253,133
23 DATA 55,96,169,16,133,54,169,3,133,55,96
24 CALL 846: CALL 976: END